Nuprl Lemma : adjacent-sublist
11,40
postcript
pdf
T
:Type,
L1
,
L2
:(
T
List).
L1
L2
(
x
,
y
:
T
. adjacent(
T
;
L1
;
x
;
y
)
x
before
y
L2
)
latex
ProofTree
Definitions
x
:
A
B
(
x
)
,
x
:
A
.
B
(
x
)
,
adjacent(
T
;
L
;
x
;
y
)
,
x
before
y
l
,
P
Q
,
Type
,
type
List
,
L1
L2
,
{
T
}
Lemmas
sublist
wf
,
adjacent
wf
,
l
before
sublist
,
l
before
wf
,
adjacent-before
origin
T:Type, L1, L2:(T List). L1 
L2 
(x, y:T. adjacent(T;L1;x;y) x before y 
L2)
T:Type, L1, L2:(T List). L1 L2 (x, y:T. adjacent(T;L1;x;y) x before y L2)
B(x)x:A. B(x) l Q L2